home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 32 / cwp.zip / POSTSCPT.XSU < prev    next >
Text File  |  1990-10-08  |  2KB  |  70 lines
  1. ; POSTSCPT.XSU - Crossword Publisher 1.0 Setup file for PostScript
  2. ; Copyright (c) 1990, Longridge Software. All rights reserved.
  3. ; Author: Richard L. Siddall, 07-OCT-90.
  4. ;
  5. ; IMPORTANT NOTE: XWP will object if any of these strings is missing, and
  6. ; expects them in this order. MODIFY THIS FILE CAREFULLY. KEEP A BACKUP.
  7. ; XWP concatenates strings on consecutive lines if the first line does not end
  8. ; with a semi-colon or comma.
  9. ;
  10. ; Although this file purports to be a PostScript output setup file, it actually
  11. ; only produces the matrix in PostScript.
  12. ; The lines controlling the output of the clues are the same as in the other
  13. ; setup files, since we assume you will use Ventura Publisher to typeset the
  14. ; clues for you.
  15. ; The matrix is printed out as a series of PostScript procedure calls.
  16. ; See the manual for details on how to create an encapsulated PostScript file
  17. ; from this output.
  18. ;
  19. ; String starting clues file - receives title and author
  20. "@Headline = %s<$M[CROSSWORD]>\n\n"
  21. "@Byline = Devised by %s\n\n"
  22. "@Section = CLUES ACROSS\n\n";
  23. ; String starting clues down
  24. "@Section = CLUES DOWN\n\n";
  25. ; String for each clue - receives number, clue and optional length
  26. "@Unindent = %d. %s%s\n\n";
  27. ; String ending clues file
  28. "The solution to this crossword will be published in the next issue.";
  29. ; String for unsolved cell - receives number
  30. "(%s) () xcell";
  31. ; String for solved cell - receives number and one letter of solution
  32. "(%s) (%c) xcell";
  33. ; String for number - receives number
  34. "%d";
  35. ; String for blank cell
  36. "bxcell";
  37. ; String separating cells
  38. "\n";
  39. ; String ending row of cells
  40. "\n\nnewrow\n";
  41. ; String starting crossword matrix - receives width and height in cells
  42. "/width %d def\n/height %d def\n"
  43. "2 2 translate\n"
  44. "gsave\n"
  45. "    pat1 0 showpattern\n"
  46. "grestore\n"
  47. "\n"
  48. "xboundary stroke\n"
  49. "0 cellheight height 1 sub mul moveto\n"
  50. "\n";
  51. ; Header row cell text
  52. "";
  53. ; String ending crossword matrix
  54. "";
  55. ; String preceeding solution length in clues file
  56. " (";
  57. ; String following solution length in clues file
  58. ").";
  59. ; String separating parts of solution length in clues file
  60. ", ";
  61. ; String for "Same as 13 across" clue - receives number and direction of clue
  62. "Same as %d %s";
  63. ; String for "Opposite of 13 across" clue - receives number and direction of clue
  64. "Opposite of %d %s";
  65. ; String for across in generated clues
  66. "across";
  67. ; String for down in generated clues
  68. "down";
  69.  
  70.